clear;clc;close all;
p=[0.40,0.18,0.10,0.10,0.07,0.06,0.05,0.04];
[h,l] = huffman(p)